home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_pru_stairpit.cog < prev    next >
Text File  |  1999-11-15  |  16KB  |  584 lines
  1.  
  2. # Jones 3D Cog Script
  3. #
  4. # PRU_stairpit.cog
  5. # 
  6. # Blocks will push you into the pit if you aren't careful.  They also form a stairway out. 
  7. # 
  8. # [GGJ] [PKM]
  9. #
  10. # (C) 1998 LucasArts Entertainment Co. All Rights Reserved
  11. # ========================================================================================
  12.  
  13. symbols
  14.     message entered
  15.     message pulse
  16.     message    arrived
  17.     message    timer
  18.     message touched
  19.     message    exited
  20.     message    startup
  21.     message    blocked
  22.  
  23.     thing   block0
  24.     thing   block1          
  25.     thing   block2
  26.     thing   block3        mask=0x409
  27.     thing   block4        mask=0x409
  28.     thing   block5        mask=0x409
  29.     #thing   block6
  30.     thing    staircam
  31.     thing    stairCamTarg
  32.  
  33.     thing    Plate2mL
  34.     thing    Plate4mL
  35.     thing    Plate6mL
  36.     thing    Plate8mL
  37.     thing    Plate10mL
  38.     thing    Plate12mL
  39.  
  40.     thing    Plate2mR
  41.     thing    Plate4mR
  42.     thing    Plate6mR
  43.     thing    Plate8mR
  44.     thing    Plate10mR
  45.     thing    Plate12mR
  46.     
  47. #    thing    fakeBlock0
  48. #    thing    fakeBlock1
  49. #    thing    fakeBlock2
  50. #    thing    fakeBlock3
  51. #    thing    fakeBlock4
  52. #    thing    fakeBlock5
  53.     #thing    fakeBlock6
  54.     
  55.     thing    blockGhost0
  56.     thing    blockGhost1
  57.     thing    blockGhost2
  58.     thing    blockGhost3
  59.     thing    blockGhost4
  60.     thing    blockGhost5
  61.     #thing    blockGhost6
  62.     
  63.     thing    backGhost0
  64.     thing    backGhost1
  65.     thing    backGhost2
  66.     thing    backGhost3
  67.     thing    backGhost4
  68.     thing    backGhost5
  69.     #thing    backGhost6
  70.     
  71.     thing    player                local
  72.     
  73.     float   baseMoveSpeed=3.5    local    // How long it takes to push out (was) how fast the blocks push out
  74.     float   moveSpeed=4.4            // Block speed adjusted for difficulty.
  75.     float    retractSpeed=0.5         // How fast they retract if you jump back the way you came
  76.     float    autoRetractSpeed=3.0    // How fast they retract automatically, after they're all out
  77.     float   pulseTime=3.0            // After a block starts pushing out, pause before next one starts
  78.     float    autoRetract=10.0        // Delay before blocks start retracting automatically
  79.         
  80.     int     counter=0            local
  81.     int        retractCounter=0    local
  82.     int     crosscheck=0         local
  83.     int        out=0                local
  84.     
  85.     int        blockTrack0            local
  86.     int        blockTrack1            local
  87.     int        blockTrack2            local
  88.     int        blockTrack3            local
  89.     int        blockTrack4            local
  90.     int        blockTrack5            local
  91.  
  92.     int        startDifficulty        local        // The difficulty setting at the time the puzzle was triggered.    
  93.     
  94.     flex    f_XDist                local
  95.     flex    f_YDist                local
  96.     flex    f_ZDist                local
  97.     thing    invisiBox=-1        local          mask=0x080
  98.     vector    v_modvec            local
  99.     vector    v_targetpos            local
  100.     sector    targetsector        local
  101.     
  102.     template    boxTpl        #currently set in Marcus to "1M oil drum c," will be changed to "1M aimable invisible cube."                             
  103.     
  104.     surface    hangR0        linkID=1    #with your back to the wall these hang ledges are to your right
  105.     surface    hangR1        linkID=1
  106.     surface    hangR2        linkID=1
  107.     surface    hangR3        linkID=1
  108.     surface    hangR4        linkID=1
  109.     
  110.     surface    hangL0        linkID=1    #with your back to the wall these hang ledges are to your left
  111.     surface    hangL1        linkID=1
  112.     surface    hangL2        linkID=1
  113.     surface    hangL3        linkID=1
  114.     surface    hangL4        linkID=1
  115.     surface    hangL5        linkID=1
  116.     
  117.     surface    hangE0        linkID=1
  118.     surface    hangE1        linkID=1
  119.     surface    hangE2        linkID=1
  120.     surface    hangE3        linkID=1
  121.     surface    hangE4        linkID=1
  122.     surface    hangE5        linkID=1
  123.     #surface    hangE6        linkID=1
  124.     
  125.     surface    musTrigger
  126.     surface    retractTrigger
  127.     surface    retractTrigger2
  128.  
  129.     
  130.     flex hangDistR0=0.5            local
  131.     flex hangDistR1=0.4            local
  132.     flex hangDistR2=0.3            local
  133.     flex hangDistR3=0.2            local
  134.     flex hangDistR4=0.1            local
  135.  
  136.     flex hangDistL0=-0.6        local
  137.     flex hangDistL1=-0.5        local
  138.     flex hangDistL2=-0.4        local
  139.     flex hangDistL3=-0.3        local
  140.     flex hangDistL4=-0.2        local
  141.     flex hangDistL5=-0.1        local
  142.  
  143.     flex retractBlocks            local
  144.  
  145.     int currentBlock        local
  146.     int currentSurface        local
  147.     int    bSurfaceFound        local
  148.     int    hanging=0            local
  149.     
  150.     int    bBlockFound=0        local
  151.     int out0=0                local
  152.     int out1=0                local
  153.     int out2=0                local
  154.     int out3=0                local
  155.     int out4=0                local
  156.     int out5=0                local
  157.     int out6=0                local
  158.     int    musOnce=0            local
  159.     
  160.     surface triggerface     mask=0x405
  161.     surface    retractface        mask=0x405
  162.     
  163.     sound    blocksnd=olv_quetzdoor_move_c.wav    local        #fol_in_scrapehard_long.wav      local
  164.     sound    blockStopSnd=olv_quetzdoor_stop_c.wav    local
  165.     sound    musStairpit=mus_gen_awechord1.wav    local
  166.  
  167.     sound        wav0=olv_outside_a02.wav        local
  168.     sound        wav1=olv_outside_a06.wav        local
  169.     sound       wav2=shw_amb3.wav                local
  170.     sound       wav3=shw_amb6.wav                local
  171.     int            numsounds=4                        local
  172.     int            numlocl=5                        local
  173.     int            soundoff=0                        local
  174.     int            sndnum                            local
  175.     int            cnt                                local
  176.     int            allblocksout=0                    local
  177.     thing        soundPos0                    nolink
  178.     thing        soundPos1                    nolink
  179.     thing        soundPos2                    nolink
  180.     thing        soundPos3                    nolink
  181.     thing        soundPos4                    nolink
  182.     surface        soundonsurf0
  183.     surface        soundonsurf1
  184.     surface        soundoffsurf0
  185.     surface        soundoffsurf1
  186.  
  187.     sector        safeCubby
  188.  
  189.  
  190.  
  191. end
  192. # ========================================================================================
  193. code
  194.  
  195. startup:
  196.  
  197.     player = GetLocalPlayerThing();
  198.  
  199.     # When the blocks are in the wall, they should be "fakeblocks" so that Indy can't hang from them.
  200. #    for (currentBlock = 0; (currentBlock <= 5); currentBlock = currentBlock + 1)
  201. #    {
  202. #        SetThingFlags(block0[currentBlock], 0x80000);
  203. #    }
  204.  
  205.     SetThingFlags(Plate2mL, 0x80000);
  206.     SetThingFlags(Plate2mR, 0x80000);
  207.     SetThingFlags(Plate4mL, 0x80000);
  208.     SetThingFlags(Plate4mR, 0x80000);
  209.     SetThingFlags(Plate6mL, 0x80000);
  210.     SetThingFlags(Plate6mR, 0x80000);
  211.     SetThingFlags(Plate8mL, 0x80000);
  212.     SetThingFlags(Plate8mR, 0x80000);
  213.     SetThingFlags(Plate10mL, 0x80000);
  214.     SetThingFlags(Plate10mR, 0x80000);
  215.     SetThingFlags(Plate12mL, 0x80000);
  216.     SetThingFlags(Plate12mR, 0x80000);
  217.     return;
  218.  
  219. # ========================================================================================
  220. entered:
  221.  
  222.     if (GetSenderRef() == safeCubby)
  223.     {
  224.         UpdateDifficulty(startDifficulty);
  225.         return;
  226.     }
  227.  
  228.     # We only care about entered messages from surfaces.
  229.     if (GetSenderType() != 6) return;
  230.  
  231.     if ((GetSenderRef() == soundoffSurf0) || (GetSenderRef() == soundoffSurf1))
  232.     {
  233.         soundoff = 1;
  234.            return;
  235.     }
  236.     if ((GetSenderRef() == soundonSurf0) || (GetSenderRef() == soundonSurf1))
  237.     {
  238.         soundoff = 0;
  239.            return;
  240.     }
  241.  
  242.     if (((GetSenderRef() == retractTrigger) || (GetSenderRef() == retractTrigger2)) && (allblocksout == 1))
  243.     {
  244.         call retractBlocks;
  245.         allblocksout=0;
  246.         crosscheck = 0;
  247.         return;
  248.     }
  249.     
  250.     if ((GetSenderRef() == musTrigger) && (musOnce == 0))
  251.     {
  252.         musOnce = 1;
  253.         PlaySoundLocal(musStairpit, 1.0, 0.0, 0x0, 1);
  254.         SetTimer(1.0);
  255.         return;
  256.     }
  257.     
  258.     # Indy lands on the second platform.
  259.     if ((GetSenderRef() == triggerface) && (crosscheck == 0))
  260.     {
  261.         crosscheck = 1;
  262.  
  263.         # Remove the fake block and add blocks you can hang from.
  264. #       SetThingFlags(fakeBlock0[0], 0x80000);
  265. #        ClearThingFlags(block0[0], 0x80000);
  266.  
  267.         // The movement time is increased by 20% of the base move speed per difficulty level under 5.
  268.         // I.e., difficulty 4 is 20% longer, diff. 3 is 40% longer, diff. 0 is 100% longer.
  269.         startDifficulty = GetDifficulty();
  270.         moveSpeed = baseMoveSpeed + (((5 - startDifficulty) * 0.2) * baseMoveSpeed);
  271.         # The first block starts to move, and the pulse will trigger the rest.
  272.         MoveThingtoPos(block0, GetThingPos(blockGhost0), movespeed);
  273.         out0[0] = 0;
  274.         blockTrack0 = PlaySoundThing(blocksnd, block0, 1.0, 7.5, 30.0, 0x1);
  275.         SetPulse(pulseTime);
  276.         return;
  277.     }
  278.         
  279.     # If Indy jumps back to the entrance
  280.     if ((GetSenderRef() == retractface) && (crosscheck == 1))
  281.     {
  282.         
  283.         Print("entered retract trigger-surface");
  284.         # Shut off the pulse.
  285.         SetPulse(0);
  286.         counter = 0;
  287.         crosscheck = 0;
  288.         retractCounter = 0;
  289.         
  290.         # Move the blocks back.
  291.         for (currentBlock = 0; (currentBlock <= 6); currentBlock = currentBlock + 1)
  292.         {
  293.             MoveThingToPos(block0[currentBlock], GetThingPos(backGhost0[currentBlock]), retractSpeed);
  294.             out0[currentBlock] = 1;
  295.         }
  296.         return;
  297.     }
  298.  
  299.     # Code below checks to see if Indy is hanging from a platform at the base of one of the blocks.
  300.  
  301.     f_YDist = 0.1; # plug in y value here
  302.     f_ZDist = 0.25; # plug in z value here            #changed from 3 for benefit of smallest block
  303.  
  304.     bSurfaceFound = 0;
  305.  
  306.     for (currentSurface = 0; (currentSurface < 5) && !bSurfaceFound; currentSurface = currentSurface + 1)
  307.     {
  308.         // Check to see if we're hanging off the left edge of our block surfaces.
  309.  
  310.         if (GetSenderRef() == hangR0[currentSurface])
  311.         {
  312.             f_XDist = hangDistR0[currentSurface];
  313.             bSurfaceFound = 1;
  314.         }
  315.     }
  316.  
  317.     if (!bSurfaceFound)
  318.     {
  319.         // We're not hanging off the right side - check for the left side.
  320.  
  321.         for (currentSurface = 0; (currentSurface < 6) && !bSurfaceFound; currentSurface = currentSurface + 1)
  322.         {
  323.             if (GetSenderRef() == hangL0[currentSurface])
  324.             {
  325.                 f_XDist = hangDistL0[currentSurface];
  326.                 bSurfaceFound = 1;
  327.             }
  328.         }
  329.     }
  330.  
  331.     # Establish a target near Indy at f_XDist, f_Ydist, f_ZDist
  332.     # Fill in offsets as needed.  0.1 = 1m
  333.     # Positive values are right (x) and forward (y) of thing center
  334.     # Z values are offset from thing center (itself offset from insert point)
  335.     # The mysterious zero vector parm in CreateThingAtPos() is for PYR
  336.     # xdist (defined above) is one half of block height, plus one
  337.  
  338.     # Create an invisible box above Indy.  (used in "Touched" section)
  339.  
  340.     if (bSurfaceFound)
  341.     {
  342.         v_modvec = VectorSet(f_XDist, f_YDist, f_ZDist);
  343.         v_targetpos = VectorAdd(VectorTransformToOrient(player, v_modvec), GetThingPos(player));    
  344.         targetsector = FindNewSectorFromThing(player, v_targetpos);
  345.         if (invisiBox != -1)
  346.         {
  347.             DetachThing(invisiBox);
  348.             DestroyThing(invisiBox);
  349.         }
  350.         invisiBox = CreateThingAtPos(boxTpl, targetsector, v_targetpos, '0 0 0');
  351.         CaptureThing(invisiBox); # no capture, no work
  352.         AttachThingToThing(invisiBox, player); # track his move
  353.     }
  354.  
  355.     if ((GetSenderID() == 1)&& ((GetSenderRef() != triggerFace) || (GetSenderRef() != retractFace)))
  356.     {
  357.         hanging = 1;
  358.     }
  359.     return;
  360.  
  361. # ========================================================================================
  362. exited:
  363.  
  364.     # Destroy the invisible box created when Indy was hanging.
  365.  
  366.     bSurfaceFound = 0;
  367.  
  368.     for (currentSurface = 0; (currentSurface < 5) && !bSurfaceFound; currentSurface = currentSurface + 1)
  369.         if (GetSenderRef() == hangR0[currentSurface])
  370.             bSurfaceFound = 1;
  371.  
  372.     if (!bSurfaceFound)
  373.         for (currentSurface = 0; (currentSurface < 6) && !bSurfaceFound; currentSurface = currentSurface + 1)
  374.             if (GetSenderRef() == hangL0[currentSurface])
  375.                 bSurfaceFound = 1;
  376.  
  377.     if (bSurfaceFound && invisiBox != -1)
  378.     {
  379.         DetachThing(invisiBox);
  380.         DestroyThing(invisiBox);
  381.         invisiBox = -1;
  382.     }
  383.  
  384.     if ((GetSenderID() == 1) && (hanging == 1))
  385.     {
  386.         hanging=0;
  387.     }
  388.  
  389. return;
  390.  
  391. # ........................................................................................
  392. pulse:
  393.  
  394.     # Move each block out
  395.     counter = counter + 1;
  396. #    SetThingFlags(fakeBlock0[counter], 0x80000);
  397. #    ClearThingFlags(block0[counter], 0x80000);
  398.     
  399.     MoveThingToPos(block0[counter], GetThingPos(blockGhost0[counter]), movespeed);
  400.     blocktrack0[counter] = PlaySoundThing(blocksnd, block0[counter], 1.0, 7.5, 30.0, 0x1);
  401.     out0[counter] = 0;
  402.  
  403.     if (counter == 5)
  404.     {
  405.         SetPulse(0);
  406.         counter = 0;
  407.         retractCounter = 0;
  408.     }
  409.     return;
  410.  
  411. # ........................................................................................    
  412. arrived:
  413.  
  414.     bBlockFound=0;
  415.  
  416.     for (currentBlock = 0; (currentBlock <= 5) && !bBlockFound; currentBlock = currentBlock + 1)
  417.         if ((GetSenderRef() == Block0[currentBlock]))
  418.             bBlockFound = 1;
  419.  
  420.     if (!bBlockFound)
  421.         return;
  422.  
  423.     currentBlock = currentBlock - 1;
  424.  
  425.     # "Out" is "0" when the blocks are moving out.
  426.     if (out0[currentBlock] == 0)
  427.     {
  428.         ClearSurfaceFlags(hangR0[currentBlock], 0x1000000);
  429.         ClearSurfaceFlags(hangL0[currentBlock], 0x1000000);
  430.         ClearSurfaceFlags(hangE0[currentBlock], 0x1000000);
  431.         out0[currentBlock] = 1;
  432.         StopSound(blockTrack0[currentBlock], 0.0);
  433.         PlaySoundThing(blockStopSnd, block0[currentBlock], 1.0, 7.5, 30.0, 0);
  434.         
  435.                 
  436.         if (hanging == 1)
  437.         {
  438.             SetActorFlags(player, 0x200000);
  439.             DetachThing(player);
  440.         }
  441.  
  442.         if (GetSenderRef() == Block5)
  443.         {
  444.             #SetTimer(autoRetract);
  445.             allblocksout=1;
  446.         }
  447.  
  448.         ClearThingFlags(Plate2mL[5 - currentBlock], 0x80000);
  449.         ClearThingFlags(Plate2mR[5 - currentBlock], 0x80000);
  450.  
  451.         return;
  452.     }
  453.     else
  454.     {
  455.         # "Out" is "1" when the blocks are moving back in.
  456.  
  457.         #SetThingFlags(Block0[currentBlock], 0x80000);
  458.         #ClearThingFlags(FakeBlock0[currentBlock], 0x80000);
  459.  
  460.         SetSurfaceFlags(hangR0[currentBlock], 0x1000000);
  461.         SetSurfaceFlags(hangL0[currentBlock], 0x1000000);
  462.         SetSurfaceFlags(hangE0[currentBlock], 0x1000000);
  463.  
  464.         StopSound(blockTrack0[currentBlock], 0.0);
  465.         PlaySoundThing(blockStopSnd, block0[currentBlock], 1.0, 7.5, 30.0, 0);
  466.         
  467.         out0[currentBlock] = 0;
  468.  
  469.         if (GetSenderRef() == Block0)
  470.         {
  471.             #crosscheck = 0;
  472.         }
  473.  
  474.         SetThingFlags(Plate2mL[5 - currentBlock], 0x80000);
  475.         SetThingFlags(Plate2mR[5 - currentBlock], 0x80000);
  476.  
  477.         return;
  478.     }
  479.  
  480.  
  481.     
  482.     #if ((hanging == 1) && (GetSenderRef() == block0[counter]))
  483.     #{
  484.     #    if (invisiBox != -1)
  485.     #    {
  486.     #        DetachThing(invisiBox);
  487.     #        DestroyThing(invisiBox);
  488.     #        invisiBox = -1;
  489.     #    }
  490.     #    SetActorFlags(player, 0x200000);
  491.     #    DetachThing(player);
  492.     #    ClearSurfaceFlags(hangR0, 0x1000000);
  493.     #    ClearSurfaceFlags(hangL0, 0x1000000);
  494.     #    ClearSurfaceFlags(hangE0, 0x1000000);
  495.     #}
  496.     
  497.     return;   
  498. # ........................................................................................
  499. timer:
  500.     if (soundoff == 1) return;
  501.     
  502.     sndnum = rand()*numsounds;
  503.     cnt = rand()*numlocl;
  504.     PlaySoundThing(wav0[sndnum], soundPos0[cnt], 0.8, 10.0, 30.0, 0);
  505.     SetTimer(rand() + 1.0);
  506.  
  507.     return;
  508.  
  509. # ........................................................................................
  510. touched:    
  511.  
  512.     if (GetSourceRef() == player)
  513.         return;
  514.  
  515.     if (GetSenderRef() == invisiBox)
  516.     {
  517.         Print("Sender is invisiBox!");
  518.         SetActorFlags(player, 0x200000);
  519.         if (invisiBox != -1)
  520.         {
  521.             DetachThing(invisiBox);
  522.             DestroyThing(invisiBox);
  523.             invisiBox = -1;
  524.         }
  525.         DetachThing(player);
  526.     }
  527.  
  528.     return;
  529.     
  530. # ........................................................................................
  531. blocked:
  532. Print("blocked");
  533.  
  534. if (GetSenderRef() == block5)
  535. {
  536.     Sleep(0.5);
  537.     Print("inside blocked if statement");
  538.     MoveThingToPos(block5, GetThingPos(blockGhost5), movespeed);
  539.     #blocktrack5 = PlaySoundThing(blocksnd, block5, 1.0, 7.5, 30.0, 0x1);
  540. }
  541. if (GetSenderRef() == block4)
  542. {
  543.     Sleep(0.5);
  544.     Print("inside blocked if statement");
  545.     MoveThingToPos(block4, GetThingPos(blockGhost4), movespeed);
  546.     #blocktrack4 = PlaySoundThing(blocksnd, block4, 1.0, 7.5, 30.0, 0x1);
  547.  
  548. }
  549.  
  550. return;
  551. # ........................................................................................
  552. retractBlocks:
  553. MakeMeStop();
  554.  
  555. AttachThingToThing(stairCamTarg, stairCam);
  556. SetCameraFocus(2, stairCam);
  557. SetCameraSecondaryFocus(2, stairCamTarg);
  558. SetCurrentCamera(2);
  559. SetCameraFOV(100, 0, 0.0);
  560.  
  561. Rotate(stairCam, -100, 1, 5);
  562.  
  563.  
  564. # Retract all of the blocks
  565. for (retractCounter = 0; retractcounter < 6; retractcounter = retractcounter + 1)
  566. {
  567.     blocktrack0[retractCounter] = PlaySoundThing(blocksnd, block0[retractCounter], 1.0, 7.5, 30.0, 0x1);
  568.     #MoveToFrame(block0[retractCounter], 0, autoRetractSpeed);
  569.     MoveThingToPos(block0[retractCounter], GetThingPos(backGhost0[retractCounter]), autoretractSpeed);
  570.     out0[retractCounter] = 1;
  571.     Sleep(0.1);
  572. }
  573. Sleep(5.0);
  574.  
  575. ClearActorFlags(player, 0x200000);
  576. SetCurrentCamera(1);
  577. Rotate(stairCam, 100, 1, 5);
  578.  
  579. return;
  580.  
  581.  
  582. # ........................................................................................
  583. end
  584.